home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 28 / 028.d81 / melodies boot (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  388b  |  15 lines
  1. 10 rem jukebox i boot
  2. 20 ifx=0thenx=1:load"unpacker",8,1
  3. 30 ifx=1thenx=2:load"micro.shp",8,1
  4. 35 ifx=2thenx=3:load"hi-res text.o",8,1
  5. 40 :
  6. 50 poke249,224:poke250,204
  7. 60 poke251,0:poke252,64
  8. 70 poke253,0:poke254,0
  9. 80 sys51456:sys51459
  10. 85 sys50759,"** please wait **",12*8,24*8
  11. 92 print"[147]load"chr$(34)"micro melodies"chr$(34)",8"
  12. 93 print"sys50759,"chr$(34)"                 "chr$(34)",12*8,24*8:run"
  13. 95 poke631,13:poke632,13:poke198,2
  14. 96 end
  15.